﻿<!-- #include file="../ding.asp" -->
<!-- #include file="../mymin.asp" -->
<%
Call Head()
w "<card title='网站攻击侦查'><p>"

IF KEY<>0 then Call error("你的权限不足！")

Dim act,o
act=request.querystring("act")
o=request.querystring("o")
if o<>"1" then
	w "你确定删除所有记录？<br/><a href=""sqldel.asp?sid="&sid&"&amp;act="&act&"&amp;o=1"">确定</a><br/>"
else
	If act="sql" Then
		myconn.Execute("delete from 74hu_sql")
	Else
		conn.Execute("delete from 74hu_eyi")
	End If
	w "删除成功！<br/>"
end if
w "<a href='sql.asp?sid="&sid&"'>[侦查后台]</a>"
Call Last
%>